Top 10k strings from Formcalc (19xx)(Chezron Software).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Utilities & Educational / Sinclair ZX Spectrum - Utilities & Educational - [TZX] (TOSEC-v2007-01-01) /

Back to the directory listing

   4 23637+256*
   2 sp=sp-int:
   2 c$=c$+"q("+x$+","+b$(x+1
   2 a$(c)="q(r,c)":
   2 ;"FORMCALC"
   2 "FORMCALC"
   2 "Column number ?";c
   1 z$=h$(c)+"  ->":
   1 waarde=waarde+
   1 vr=get-q(r-1
   1 t1=q(r,w):
   1 q(r,w)=q(e,w):
   1 q(r,c)>q(e,c)
   1 q(r,c)>max
   1 q(r,c)=waarde:
   1 q(r,c)=waarde
   1 q(n,c)=q(n,c)+q(r,c):
   1 q(n,c)=.001
   1 q(e,w)=t1:
   1 max=q(r,c)
   1 int=(int*n1)/(n1-1
   1 get=q(r,c)*fac:
   1 get=q(r,c)*fac
   1 end=(m-((blad-1
   1 c$=c$+b$(x):
   1 add column
   1 a$(c)="q(r,c-1)+(r
   1 a$(c)="Q(r,c)":
   1 Spreadsheet not yet created!!
   1 Shell metzner sort  
   1 Scroll shift        
   1 Scroll routine      
   1 Recalculation
   1 Printroutine      
   1 Print heads
   1 Print addition
   1 O;"     ";:
   1 O,O;"Command?";
   1 Left and right shift
   1 LINEDIAGRAM
   1 LEICESTER LE4 3FF
   1 Input of individual
   1 Input of formulas
   1 ISSUED IN OUTLET!
   1 INPUT FOR DIAGRAM
   1 INKEY$ ROUTINE
   1 I+I,O;"                                                               ":
   1 HELPROUTINE
   1 GRAPHIC CHOICE
   1 First column
   1 FORMCALC  
   1 F O R M C A L C
   1 Decipher formulas 
   1 DRIVE,   BIRSTALL
   1 Created with Ramsoft MakeTZX
   1 Column headers
   1 Column change
   1 Clear page
   1 Change value
   1 Change column distance
   1 CHEZRON  SOFTWARE
   1 BLOCK DIAGRAM
   1 Axis+TEXTS
   1 ALL ENQUIRIES TO:
   1 ;q(r,c);" ":
   1 ;"COLUMN ";c
   1 ;"==============================================================="
   1 ;" K Bytes Available":
   1 ;"                           "
   1 ;"                                                               "
   1 60<00*00002
   1 34,   SALTERSGATE
   1 3->Old formulas
   1 23638-4315":
   1 23638-39":
   1 23638-1509":
   1 23638-148":
   1 2->Old page
   1 1->New page
   1 1)*q(r-1*(r
   1 0->Exit to OUTLET"'''''"
   1 )="q(r,c)"
   1 (q(r,c)*100
   1 (q(n,c)*100
   1 ("Confirm change column ";c;" y/n");x$
   1 "sum  Addition of column"'"men  To Main Menu"'"cf   Create formula, e.g. K1*K2/K3+10"
   1 "sor  Sort column"'"hlp  To this HELP Page"'"prt  Print all values to printer"
   1 "kn   How many columns on screen"'"kx   Change individual value"'"cls  Clear page"
   1 "kf   Input stepped values in column"'"kk   Input single value in complete column"'"k    Input values in column one at a time"
   1 "hd   Make head above column (max 6 chars)"'"o    Stop program and return to OUTLET"'"cal  Recalculate all items"
   1 "cop  COPY Screen to printer"'"5    Column left                8    Column right"'"5n x Shift left to column x     8n x Shift right to column x"     
   1 "b    Bottom rows on screen      t    Top rows on screen"'"gr   Show column in Graphical way"
   1 "Value ";waarde:
   1 "Value ";q(r,c)
   1 "Start value ";waarde,"Step value ";
   1 "Start at ",x:
   1 "Row number ";r:
   1 "New value ";q(r,c)
   1 "K";a;" = ";a$(a):
   1 "How many rows ";n1:
   1 "How many columns on the screen ?";c1:
   1 "How many columns on screen ?";c1:
   1 "How many columns ";m:
   1 "GRAPHICS"
   1 "Formula ?";a$(c):
   1 "Column number";c
   1 "Column number to be sorted ";c:
   1 "Column number to be first ?";x:
   1 "Column number for adding ";c:
   1 "Column number ?";c:
   1 "Column number ";c:
   1 "Column head (MAX 6 Chars) ?";h$(c):
   1 "A:FORMCALC"
   1 "23658",O:
   1 "1 Linediagram"'"2 Block diagram"
   1 "(hlp = HELP PAGE) :";i$:
   1 "'''"  A Spreadsheet program"
   1  PLAY THE TAPE 
   1  NOT AVAILABLE ON TAPE VERSION!
   1  128 CHARS 
   1     ";n1;" Rows";"   ";m;" Cols";"  ";:
   1         AUTOCHARS PLUS !
   1            "
   1